home *** CD-ROM | disk | FTP | other *** search
- object Form1: TForm1
- Left = 193
- Top = 113
- AutoScroll = False
- Caption = 'SysFile - System File Editor'
- ClientHeight = 256
- ClientWidth = 423
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- KeyPreview = True
- PixelsPerInch = 96
- Position = poScreenCenter
- PrintScale = poNone
- Scaled = False
- OnCloseQuery = FormCloseQuery
- OnCreate = FormCreate
- OnKeyUp = FormKeyUp
- OnResize = FormResize
- TextHeight = 16
- object Notebook: TTabbedNotebook
- Left = 0
- Top = 0
- Width = 423
- Height = 256
- HelpContext = 6
- Align = alClient
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- TabFont.Color = clNavy
- TabFont.Height = -11
- TabFont.Name = 'Arial'
- TabFont.Style = []
- TabOrder = 0
- TabStop = False
- OnClick = NotebookClick
- object TTabPage
- Left = 5
- Top = 27
- Caption = '&Set Up'
- object BottomPanel: TPanel
- Left = 0
- Top = 205
- Width = 413
- Height = 19
- Align = alBottom
- TabOrder = 0
- end
- object Panel2: TPanel
- Left = 0
- Top = 0
- Width = 413
- Height = 25
- Align = alTop
- TabOrder = 1
- object FileLabel: TLabel
- Left = 4
- Top = 8
- Width = 28
- Height = 16
- Caption = 'Files'
- FocusControl = FileList
- end
- object AutoLabel: TLabel
- Left = 248
- Top = 8
- Width = 62
- Height = 16
- Caption = 'Auto Open'
- FocusControl = AutoList
- end
- end
- object BtnPanel: TPanel
- Left = 165
- Top = 25
- Width = 83
- Height = 180
- Align = alClient
- TabOrder = 2
- object bTake: TBitBtn
- Left = 5
- Top = 7
- Width = 73
- Height = 33
- HelpContext = 6
- Caption = '&Take'
- TabOrder = 0
- OnClick = bTakeClick
- OnDragDrop = AutoListDragDrop
- OnDragOver = ListDragOver
- Glyph.Data = {
- 78010000424D7801000000000000760000002800000020000000100000000100
- 04000000000000000000120B0000120B00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333333333333333333333333333333333333333333333333333333333
- 3333333333333333333333333333333333333333333FF3333333333333003333
- 3333333333773FF3333333333309003333333333337F773FF333333333099900
- 33333FFFFF7F33773FF30000000999990033777777733333773F099999999999
- 99007FFFFFFF33333F7700000009999900337777777F333F7733333333099900
- 33333333337F3F77333333333309003333333333337F77333333333333003333
- 3333333333773333333333333333333333333333333333333333333333333333
- 33333333333333333333333333333333333333333333333333330000}
- Margin = 4
- NumGlyphs = 2
- end
- object bDrop: TBitBtn
- Left = 5
- Top = 48
- Width = 73
- Height = 33
- HelpContext = 6
- Caption = '&Drop'
- TabOrder = 1
- OnClick = bDropClick
- OnDragDrop = FileListDragDrop
- OnDragOver = ListDragOver
- Glyph.Data = {
- 78010000424D7801000000000000760000002800000020000000100000000100
- 04000000000000000000120B0000120B00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333333333333333333333333333333333333333333333333333333333
- 3333333333333FF3333333333333003333333333333F77F33333333333009033
- 333333333F7737F333333333009990333333333F773337FFFFFF330099999000
- 00003F773333377777770099999999999990773FF33333FFFFF7330099999000
- 000033773FF33777777733330099903333333333773FF7F33333333333009033
- 33333333337737F3333333333333003333333333333377333333333333333333
- 3333333333333333333333333333333333333333333333333333333333333333
- 33333333333333333333333333333333333333333333333333330000}
- Layout = blGlyphRight
- Margin = 4
- NumGlyphs = 2
- end
- object bOptions: TBitBtn
- Left = 5
- Top = 96
- Width = 73
- Height = 33
- HelpContext = 6
- Caption = '&Options'
- TabOrder = 2
- OnClick = bOptionsClick
- Glyph.Data = {
- 78010000424D7801000000000000760000002800000020000000100000000100
- 04000000000000000000120B0000120B00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
- 5000555555555555577755555555555550B0555555555555F7F7555555555550
- 00B05555555555577757555555555550B3B05555555555F7F557555555555000
- 3B0555555555577755755555555500B3B0555555555577555755555555550B3B
- 055555FFFF5F7F5575555700050003B05555577775777557555570BBB00B3B05
- 555577555775557555550BBBBBB3B05555557F555555575555550BBBBBBB0555
- 55557F55FF557F5555550BB003BB075555557F577F5575F5555577B003BBB055
- 555575F7755557F5555550BB33BBB0555555575F555557F555555507BBBB0755
- 55555575FFFF77555555555700007555555555577777755555550000}
- Margin = 2
- NumGlyphs = 2
- end
- object bHelp: TBitBtn
- Left = 5
- Top = 138
- Width = 73
- Height = 33
- HelpContext = 6
- Caption = '&Help'
- TabOrder = 3
- OnClick = bHelpClick
- Glyph.Data = {
- 78010000424D7801000000000000760000002800000020000000100000000100
- 04000000000000000000120B0000120B00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333FFFFF3333333333F797F3333333333F737373FF333333BFB999BFB
- 33333337737773773F3333BFBF797FBFB33333733337333373F33BFBFBFBFBFB
- FB3337F33333F33337F33FBFBFB9BFBFBF3337333337F333373FFBFBFBF97BFB
- FBF37F333337FF33337FBFBFBFB99FBFBFB37F3333377FF3337FFBFBFBFB99FB
- FBF37F33333377FF337FBFBF77BF799FBFB37F333FF3377F337FFBFB99FB799B
- FBF373F377F3377F33733FBF997F799FBF3337F377FFF77337F33BFBF99999FB
- FB33373F37777733373333BFBF999FBFB3333373FF77733F7333333BFBFBFBFB
- 3333333773FFFF77333333333FBFBF33333333333777773333330000}
- NumGlyphs = 2
- end
- end
- object FilePanel: TPanel
- Left = 0
- Top = 25
- Width = 165
- Height = 180
- Align = alLeft
- TabOrder = 3
- object FileList: TListBox
- Left = 1
- Top = 1
- Width = 163
- Height = 178
- HelpContext = 6
- Align = alClient
- IntegralHeight = True
- ItemHeight = 16
- MultiSelect = True
- PopupMenu = FilePopup
- Sorted = True
- TabOrder = 0
- OnDblClick = bTakeClick
- OnDragDrop = FileListDragDrop
- OnDragOver = ListDragOver
- OnMouseDown = ListMouseDown
- end
- end
- object AutoPanel: TPanel
- Left = 248
- Top = 25
- Width = 165
- Height = 180
- Align = alRight
- TabOrder = 4
- object AutoList: TListBox
- Left = 1
- Top = 1
- Width = 163
- Height = 178
- HelpContext = 6
- Align = alClient
- IntegralHeight = True
- ItemHeight = 16
- MultiSelect = True
- PopupMenu = AutoPopup
- TabOrder = 0
- OnDblClick = bDropClick
- OnDragDrop = AutoListDragDrop
- OnDragOver = ListDragOver
- OnMouseDown = ListMouseDown
- end
- end
- end
- end
- object EditPopup: TPopupMenu
- Left = 196
- object mFind: TMenuItem
- Caption = '&Find'
- HelpContext = 24
- OnClick = mFindClick
- ShortCutText = 'Ctrl+F'
- end
- object mReplace: TMenuItem
- Caption = '&Replace'
- HelpContext = 24
- OnClick = mReplaceClick
- ShortCutText = 'Ctrl+R'
- end
- object N1: TMenuItem
- Caption = '-'
- end
- object mEditRemove: TMenuItem
- Caption = 'Re&move'
- HelpContext = 14
- OnClick = mEditRemoveClick
- end
- object mEditProtect: TMenuItem
- Caption = '&Protect File'
- HelpContext = 16
- OnClick = ProtectClick
- ShortCutText = 'Ctrl+P'
- end
- object N3: TMenuItem
- Caption = '-'
- end
- object mEditDelete: TMenuItem
- Caption = '&Delete File'
- HelpContext = 15
- OnClick = mDeleteClick
- end
- object N5: TMenuItem
- Caption = '-'
- end
- object mExit: TMenuItem
- Caption = 'E&xit'
- HelpContext = 25
- OnClick = mExitClick
- end
- end
- object AutoPopup: TPopupMenu
- Left = 140
- object mAutoEdit: TMenuItem
- Caption = '&Edit'
- HelpContext = 34
- OnClick = mEditClick
- end
- object mAutoRemove: TMenuItem
- Caption = '&Remove'
- HelpContext = 14
- OnClick = bDropClick
- end
- object mAutoProtect: TMenuItem
- Caption = '&Protect File'
- HelpContext = 16
- OnClick = ProtectClick
- ShortCutText = 'Ctrl+P'
- end
- object N2: TMenuItem
- Caption = '-'
- end
- object mAutoDelete: TMenuItem
- Caption = '&Delete File'
- HelpContext = 15
- OnClick = mDeleteClick
- end
- end
- object FilePopup: TPopupMenu
- Left = 168
- object mFileEdit: TMenuItem
- Caption = '&Edit'
- HelpContext = 34
- OnClick = mEditClick
- end
- object mFileAdd: TMenuItem
- Caption = '&Add'
- HelpContext = 4
- OnClick = bTakeClick
- end
- object mFileProtect: TMenuItem
- Caption = '&Protect File'
- HelpContext = 16
- OnClick = ProtectClick
- ShortCutText = 'Ctrl+P'
- end
- object N4: TMenuItem
- Caption = '-'
- end
- object mFileDelete: TMenuItem
- Caption = '&Delete File'
- HelpContext = 15
- OnClick = mDeleteClick
- end
- end
- object FindDialog1: TFindDialog
- Options = [frDown, frHideWholeWord, frHideUpDown]
- OnFind = FindDialog1Find
- Left = 240
- end
- object ReplaceDialog1: TReplaceDialog
- Options = [frDown, frHideWholeWord, frHideUpDown]
- OnFind = FindDialog1Find
- OnReplace = ReplaceDialog1Replace
- Left = 268
- end
- end
-